perm filename PPSAV.BUG[2,TES] blob sn#042982 filedate 1973-05-15 generic text, type T, neo UTF8
  18.3K	  25-APR-73
	TOTAL=  51.8K


EXIT
↑C

.DO NIT

EXIT
↑C

.
SAIL: PUB    1
   PUBDFS 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
 2 3 4 5 6 7
   PUBINR 1
 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35DR
YROT REMOP:STCNST
PUB, PAGE 35
00400	   FOR J ← "a" THRU "z" DO
                                   DPB(J-("a"-"A"), UPCASE(J)) ;  DPB(J←"!", UPCASE(
"_")) ;
CALLED FROM 46255
?*↑C
↑C

.DO NIT

EXIT
↑C

.
SAIL: PUB    1
   PUBDFS 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
 2 3 4 5 6 7
   PUBINR 1
 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35DR
YROT REMOP:STCNST
PUB, PAGE 35
00400	   FOR J ← "a" THRU "z" DO
                                   DPB(J-("a"-"A"), UPCASE(J)) ;  DPB(J←"!", UPCASE(
"_")) ;
CALLED FROM 46255
?*

*↑C
↑C

.R PPSAV